#pragma once

#include <iostream>
#include <string>
#include <memory>
#include <sys/select.h>
#include <poll.h>
#include <sys/epoll.h>
#include "Log.hpp"
#include "Socket.hpp"
#include "InetAddr.hpp"

using namespace SocketModule;
using namespace LogModule;

// #define NUM sizeof(fd_set) * 8
#define MAX 4096
const int gdefaultfd = -1;
class EpollServer
{
    static const int revs_num = 64;
public:
    EpollServer(int port)
        : _port(port),
          _listen_socket(std::make_unique<TcpSocket>()),
          _isrunning(false),
          _epfd(gdefaultfd)
    {
    }
    void Init()
    {
        _listen_socket->BuildTcpSocketMethod(_port);

        _epfd = epoll_create(256);
        if(_epfd<0)
        {
            LOG(LogLevel::ERROR)<<"epoll_create error";
            exit(EPOLL_CREATE_ERR);
        }
        LOG(LogLevel::ERROR)<<"epoll_create success: "<<_epfd;

        struct epoll_event ev;
        ev.events = EPOLLIN;
        ev.data.fd = _listen_socket->Fd();
        int n = epoll_ctl(_epfd,EPOLL_CTL_ADD,_listen_socket->Fd(),&ev);
        if(n<0)
        {
            LOG(LogLevel::ERROR)<<"epoll_ctl error";
            exit(EPOLL_CTL_ERR);
        }
        // for (int i = 0; i < MAX; i++)
        // {
        //     _fds[i].fd = gdefaultfd;
        //     _fds[i].events = 0;
        //     _fds[i].revents = 0;
        // }
        // _fds[0].fd = _listen_socket->Fd();
        // _fds[0].events |= POLLIN;
    }

    void Loop()
    {
        // fd_set rfds; // 读文件描述符
        // int timeout = -1;
        // _isrunning = true;
        int timeout = -1;
        _isrunning = true;
        while (_isrunning)
        {
            int n = epoll_wait(_epfd,_revs,revs_num,timeout);

            //int n = poll(_fds, MAX, timeout);
            // FD_ZERO(&rfds);
            // struct timeval timeout = {10, 0};

            // int maxfd = gdefaultfd;
            // for (int i = 0; i < MAX; i++)
            // {
            //     if (_fd_array[i] == gdefaultfd)
            //     {
            //         continue;
            //     }
            //     FD_SET(_fd_array[i], &rfds); // 包含listensockfd
            //     if (maxfd < _fd_array[i])
            //     {
            //         maxfd = _fd_array[i];
            //     }
            // }

            // int n = select(maxfd + 1, &rfds, nullptr, nullptr, &timeout);
            switch (n)
            {
            case 0:
                std::cout << "time out..." << std::endl;
                break;
            case -1:
                perror("epoll_wait");
                break;
            default:
                // std::cout << "有事件就绪...,timeout: " << timeout.tv_sec << ":" << timeout.tv_usec << std::endl;
                std::cout << "有事件就绪...,timeout:" << std::endl;
                // Dispatcher(rfds);
                Dispatcher(n);
                break;
            }
        }
        _isrunning = false;
    }
    void Accepter()
    {
        InetAddr client;
        auto newsocket = _listen_socket->Accepter(&client);
        if (newsocket->Fd() < 0)
            return;
        else
        {
            std::cout << "获得了一个新链接: " << newsocket->Fd() << "client info:" << client.Addr() << std::endl;
            
            struct epoll_event ev;
            ev.events = EPOLLIN;
            ev.data.fd = newsocket->Fd();
            int n = epoll_ctl(_epfd,EPOLL_CTL_ADD,newsocket->Fd(),&ev);
            if(n<0)
            {
                LOG(LogLevel::ERROR)<<"epoll_ctl error";
                close(newsocket->Fd());
            }
            LOG(LogLevel::DEBUG)<<"epoll_ctl success: "<<newsocket->Fd();

            // int pos = -1;
            // for (int j = 0; j < MAX; j++)
            // {
            //     if (_fds[j].fd == gdefaultfd)
            //     {
            //         pos = j;
            //         break;
            //     }
            // }
            // if (pos == -1)
            // {
            //     LOG(LogLevel::ERROR) << "服务器已经满了...";
            //     close(newsocket->Fd());
            // }
            // else
            // {
            //     _fds[pos].fd = newsocket->Fd();
            //     _fds[pos].events = POLLIN;
            // }
        }
    }

    void Recver(int fd)
    {
        char buffer[1024];
        ssize_t n = recv(fd, buffer, sizeof(buffer) - 1, 0); // 会不会被阻塞？就绪了
        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << "client# " << buffer << std::endl;
            // 把读到的信息，在回显会去
            std::string message = "echo# ";
            message += buffer;
            send(fd, message.c_str(), message.size(), 0); // bug
        }
        else if (n == 0)
        {
            LOG(LogLevel::DEBUG) << "客户端退出, sockfd: " << fd;
            int m = epoll_ctl(_epfd,EPOLL_CTL_DEL,fd,nullptr);
            if(m<0)
            {
                LOG(LogLevel::ERROR)<<"epoll_ctl error";
                return;
            }
            LOG(LogLevel::DEBUG)<<"epoll_ctl success: "<<fd;

            close(fd);
            fd = gdefaultfd;
        }
        else
        {
            LOG(LogLevel::DEBUG) << "客户端读取出错, sockfd: " << fd;
            int m = epoll_ctl(_epfd,EPOLL_CTL_DEL,fd,nullptr);
            if(m<0)
            {
                LOG(LogLevel::ERROR)<<"epoll_ctl error";
                return;
            }
            LOG(LogLevel::DEBUG)<<"epoll_ctl success: "<<fd;

            close(fd);
            fd = gdefaultfd;
        }
    }
    void Dispatcher(int rnum)
    {
        for (int i = 0; i < rnum; i++)
        {
            int events = _revs[i].events;
            int fd = _revs[i].data.fd;
            if (fd == gdefaultfd)
            {
                continue;
            }
            if (fd == _listen_socket->Fd())
            {
                if (events & POLLIN)
                {
                    Accepter();
                }
            }
            else
            {
                if (events & POLLIN)
                {
                    Recver(fd);
                }
            }
        }
    }

    // void Dispatcher(fd_set& rfds)
    // {
    //     for(int i = 0;i<NUM;i++)
    //     {
    //         if(_fd_array[i]==gdefaultfd)
    //         {
    //             continue;
    //         }
    //         if(_fd_array[i]==_listen_socket->Fd())
    //         {
    //             if(FD_ISSET(_fd_array[i],&rfds))
    //             {
    //                 Accepter();
    //             }
    //         }
    //         else
    //         {
    //             if(FD_ISSET(_fd_array[i],&rfds))
    //             {
    //                 Recver(i);
    //             }
    //         }
    //     }
    // }
    ~EpollServer()
    {
        _listen_socket->Close();
        if(_epfd>=0)
            close(_epfd);
    }
    // void TestFd()
    // {
    //     std::cout << "pollfd: ";
    //     for (int i = 0; i < MAX; i++)
    //     {
    //         if (_fds[i].fd == gdefaultfd)
    //             continue;
    //         std::cout << _fds[i].fd << "[" << Events2Str(_fds[i].events) << "] ";
    //     }
    //     std::cout << "\n";
    // }
    // std::string Events2Str(short events)
    // {
    //     std::string s = ((events & POLLIN) ? "EPOLLIN" : "");
    //     s += ((events & POLLOUT) ? "POLLOUT" : "");
    //     return s;
    // }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_socket;
    bool _isrunning;
    int _epfd;
    struct epoll_event _revs[revs_num];
    // int _fd_array[NUM]; // 辅助数组
    //struct pollfd _fds[MAX];
};